home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / libintf.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  18.2 KB  |  420 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'LibIntf.pas' rev: 3.00
  6.  
  7. #ifndef LibIntfHPP
  8. #define LibIntfHPP
  9. #include <FileIntf.hpp>
  10. #include <EditIntf.hpp>
  11. #include <Exptintf.hpp>
  12. #include <ToolIntf.hpp>
  13. #include <DsgnIntf.hpp>
  14. #include <TypInfo.hpp>
  15. #include <VirtIntf.hpp>
  16. #include <Forms.hpp>
  17. #include <Graphics.hpp>
  18. #include <Controls.hpp>
  19. #include <Classes.hpp>
  20. #include <SysUtils.hpp>
  21. #include <Windows.hpp>
  22. #include <SysInit.hpp>
  23. #include <System.hpp>
  24.  
  25. //-- user supplied -----------------------------------------------------------
  26.  
  27. namespace Libintf
  28. {
  29. //-- type declarations -------------------------------------------------------
  30. enum TDesignDialog { ddAlign, ddSize, ddScale, ddTabOrder, ddCreationOrder, ddSaveTemplate };
  31.  
  32. struct TDesignerOptions
  33. {
  34.     bool DisplayGrid;
  35.     bool SnapToGrid;
  36.     int GridSizeX;
  37.     int GridSizeY;
  38.     bool ShowComponentCaptions;
  39. } ;
  40.  
  41. class DELPHICLASS TIPaletteItem;
  42. class DELPHICLASS TIModule;
  43. class PASCALIMPLEMENTATION TIPaletteItem : public Virtintf::TInterface 
  44. {
  45.     typedef Virtintf::TInterface inherited;
  46.     
  47. public:
  48.     virtual Classes::TComponent* __fastcall CreateComponent(Classes::TComponent* Owner, Classes::TComponent* 
  49.         Parent, TIModule* Module, const Windows::TRect &Rect) = 0;
  50.     virtual void __fastcall Paint(Graphics::TCanvas* Canvas, int X, int Y) = 0;
  51. public:
  52.     /* TInterface.Create */ __fastcall TIPaletteItem(void) : Virtintf::TInterface() { }
  53.     
  54. public:
  55.     /* TObject.Destroy */ __fastcall virtual ~TIPaletteItem(void) { }
  56.     
  57. };
  58.  
  59. class DELPHICLASS TIDelphiIDE;
  60. class PASCALIMPLEMENTATION TIDelphiIDE : public Virtintf::TInterface 
  61. {
  62.     typedef Virtintf::TInterface inherited;
  63.     
  64. public:
  65.     virtual void __fastcall ActiveFormModified(void) = 0;
  66.     virtual void __fastcall ComponentRenamed(const System::AnsiString CurName, const System::AnsiString 
  67.         NewName) = 0;
  68.     virtual void __fastcall ExecDesignDialog(TDesignDialog DesignDialog) = 0;
  69.     virtual void __fastcall FormActivated(void) = 0;
  70.     virtual HWND __fastcall GetAppHandle(void) = 0;
  71.     virtual System::AnsiString __fastcall GetPathAndBaseExeName(void) = 0;
  72.     virtual System::AnsiString __fastcall GetBaseRegKey(void) = 0;
  73.     virtual bool __fastcall GetToolSelected(void) = 0;
  74.     virtual TIPaletteItem* __fastcall GetCurCompClass(void) = 0;
  75.     virtual TIPaletteItem* __fastcall GetPaletteItem(System::TMetaClass* ComponentClass) = 0;
  76.     virtual int __fastcall GetCurTime(void) = 0;
  77.     virtual void __fastcall GetDesignerOptions(TDesignerOptions &Options) = 0;
  78.     virtual Windows::TRect __fastcall GetMainWindowSize(void) = 0;
  79.     virtual tagPOINT __fastcall GetWorkspaceOrigin(void) = 0;
  80.     virtual bool __fastcall LockState(void) = 0;
  81.     virtual void __fastcall ModalEdit(char EditKey, void * ReturnWindow) = 0;
  82.     virtual void __fastcall OpenForm(const System::AnsiString FormName, bool Show) = 0;
  83.     virtual void __fastcall RaiseException(const System::AnsiString Message) = 0;
  84.     virtual void __fastcall ResetCompClass(void) = 0;
  85.     virtual void __fastcall SelectionChanged(void) = 0;
  86.     virtual void __fastcall ShowClassHelp(const System::AnsiString ClassName) = 0;
  87.     virtual void __fastcall SelectItemName(const System::AnsiString PropertyName) = 0;
  88.     virtual void __fastcall ValidateActiveModule(void) = 0;
  89.     virtual void __fastcall AddExpert(Exptintf::TIExpert* Expert) = 0;
  90.     virtual void __fastcall RemoveExpert(Exptintf::TIExpert* Expert) = 0;
  91.     virtual Toolintf::TIToolServices* __fastcall GetToolServices(void) = 0;
  92.     virtual void __fastcall ExpertsLoaded(void) = 0;
  93.     virtual Fileintf::TIVirtualFileSystem* __fastcall GetFileSystem(const System::AnsiString Ident) = 0
  94.         ;
  95.     virtual System::AnsiString __fastcall MakeBackupFileName(const System::AnsiString FileName) = 0;
  96.     virtual bool __fastcall CreateBackupFile(void) = 0;
  97.     virtual bool __fastcall WinHelp(const System::AnsiString HelpFile, int Command, int Data) = 0;
  98.     virtual void __fastcall ValidateFormEdit(void) = 0;
  99. public:
  100.     /* TInterface.Create */ __fastcall TIDelphiIDE(void) : Virtintf::TInterface() { }
  101.     
  102. public:
  103.     /* TObject.Destroy */ __fastcall virtual ~TIDelphiIDE(void) { }
  104.     
  105. };
  106.  
  107. class DELPHICLASS TICompClass;
  108. class PASCALIMPLEMENTATION TICompClass : public Virtintf::TInterface 
  109. {
  110.     typedef Virtintf::TInterface inherited;
  111.     
  112. public:
  113.     virtual tagPOINT __fastcall GetBitmapPos(bool Selected) = 0;
  114.     virtual System::AnsiString __fastcall GetClassName(void) = 0;
  115.     virtual System::AnsiString __fastcall GetDefaultPage(void) = 0;
  116.     virtual int __fastcall GetModuleIndex(void) = 0;
  117. public:
  118.     /* TInterface.Create */ __fastcall TICompClass(void) : Virtintf::TInterface() { }
  119.     
  120. public:
  121.     /* TObject.Destroy */ __fastcall virtual ~TICompClass(void) { }
  122.     
  123. };
  124.  
  125. enum TPropKind { pkProperties, pkEvents };
  126.  
  127. class DELPHICLASS TIProperty;
  128. typedef void __fastcall (__closure *TGetPropProc)(TIProperty* Prop);
  129.  
  130. enum LibIntf__4 { fsVisible, fsIconic, fsZoomed };
  131.  
  132. typedef Set<LibIntf__4, fsVisible, fsZoomed>  TFormState;
  133.  
  134. enum TEditAction { eaUndo, eaRedo, eaCut, eaCopy, eaPaste, eaDelete, eaSelectAll, eaPrint, eaBringToFront, 
  135.     eaSendToBack, eaAlignToGrid };
  136.  
  137. enum LibIntf__5 { esCanUndo, esCanRedo, esCanCut, esCanCopy, esCanPaste, esCanDelete, esCanZOrder, esCanAlignGrid, 
  138.     esCanEditOle, esCanTabOrder, esCanCreationOrder, esCanPrint, esCanSelectAll };
  139.  
  140. typedef Set<LibIntf__5, esCanUndo, esCanSelectAll>  TEditState;
  141.  
  142. enum TShowState { ssNormal, ssMinimized, ssMaximized };
  143.  
  144. enum TAffect { afTop, afLeft, afBottom, afRight, afHCenter, afVCenter, afHSpace, afVSpace, afHWinCenter, 
  145.     afVWinCenter, afNothing };
  146.  
  147. enum TSizeAffect { asHGrow, asHShrink, asHAbsolute, asVGrow, asVShrink, asVAbsolute, asNothing };
  148.  
  149. class DELPHICLASS TIFile;
  150. class PASCALIMPLEMENTATION TIFile : public Virtintf::TInterface 
  151. {
  152.     typedef Virtintf::TInterface inherited;
  153.     
  154. public:
  155.     virtual Virtintf::TIStream* __fastcall FormFileOpen(void) = 0;
  156.     virtual System::AnsiString __fastcall GetFileName(void) = 0;
  157.     virtual int __fastcall GetTimeAtLoad(void) = 0;
  158.     virtual int __fastcall GetModifyTime(void) = 0;
  159.     virtual bool __fastcall CheckFileDate(void) = 0;
  160.     virtual void __fastcall Rename(const System::AnsiString NewFileName) = 0;
  161.     virtual void __fastcall Save(void) = 0;
  162. public:
  163.     /* TInterface.Create */ __fastcall TIFile(void) : Virtintf::TInterface() { }
  164.     
  165. public:
  166.     /* TObject.Destroy */ __fastcall virtual ~TIFile(void) { }
  167.     
  168. };
  169.  
  170. class DELPHICLASS TIForm;
  171. typedef void __fastcall (__closure *TGetFormProc)(TIForm* AForm);
  172.  
  173. class DELPHICLASS TICompInfo;
  174. class PASCALIMPLEMENTATION TIForm : public Libintf::TIFile 
  175. {
  176.     typedef Libintf::TIFile inherited;
  177.     
  178. protected:
  179.     virtual Dsgnintf::TFormDesigner* __fastcall GetDesigner(void) = 0;
  180.     
  181. public:
  182.     virtual void __fastcall Align(TAffect Affect) = 0;
  183.     virtual void __fastcall CreateComponent(TIPaletteItem* Item) = 0;
  184.     virtual System::AnsiString __fastcall FindCompClass(const System::AnsiString CompName) = 0;
  185.     virtual System::AnsiString __fastcall GetAncestorName(void) = 0;
  186.     virtual int __fastcall GetCompCount(void) = 0;
  187.     virtual void __fastcall GetDependentForms(TGetFormProc Proc) = 0;
  188.     virtual System::AnsiString __fastcall GetDesignClassName(void) = 0;
  189.     virtual void __fastcall GetFormDependencies(TGetFormProc Proc) = 0;
  190.     virtual void * __fastcall GetNVComp(int Index) = 0;
  191.     virtual TICompInfo* __fastcall GetCompInfo(int Index) = 0;
  192.     virtual TIModule* __fastcall GetModule(void) = 0;
  193.     virtual System::AnsiString __fastcall GetCompName(int Index) = 0;
  194.     virtual System::AnsiString __fastcall GetFileSystem(void) = 0;
  195.     virtual Editintf::TIFormInterface* __fastcall GetFormInterface(void) = 0;
  196.     virtual System::AnsiString __fastcall GetFormName(void) = 0;
  197.     virtual HBITMAP __fastcall GetFormImage(void) = 0;
  198.     virtual void __fastcall GetFormUnits(Classes::TGetStrProc Proc) = 0;
  199.     virtual TFormState __fastcall GetState(void) = 0;
  200.     virtual int __fastcall GetTabCompCount(void) = 0;
  201.     virtual bool __fastcall GetTabCompInfo(int Order, System::AnsiString &Name, void * &Comp) = 0;
  202.     virtual int __fastcall GetObjectMenuItemCount(void) = 0;
  203.     virtual System::AnsiString __fastcall GetObjectMenuItem(int Index) = 0;
  204.     virtual void __fastcall ObjectMenuAction(int Index) = 0;
  205.     virtual void __fastcall Hide(void) = 0;
  206.     virtual void __fastcall GoDormant(void) = 0;
  207.     virtual void __fastcall RenameFormMethod(const System::AnsiString CurName, const System::AnsiString 
  208.         NewName) = 0;
  209.     virtual void __fastcall RemoveDependentLinks(void) = 0;
  210.     virtual void __fastcall Scale(int Factor) = 0;
  211.     virtual void __fastcall SetFileSystem(const System::AnsiString FileSystem) = 0;
  212.     virtual void __fastcall SetFormName(const System::AnsiString AName) = 0;
  213.     virtual void __fastcall SetSelection(const System::AnsiString Name) = 0;
  214.     virtual void __fastcall SetNVComp(void * Comp, int Order) = 0;
  215.     virtual void __fastcall SetTabCompOrder(void * Comp, int Order) = 0;
  216.     virtual void __fastcall Show(void) = 0;
  217.     virtual void __fastcall ShowAs(TShowState ShowState) = 0;
  218.     virtual void __fastcall Size(TSizeAffect Affect, int Value) = 0;
  219.     __property Dsgnintf::TFormDesigner* Designer = {read=GetDesigner};
  220. public:
  221.     /* TInterface.Create */ __fastcall TIForm(void) : Libintf::TIFile() { }
  222.     
  223. public:
  224.     /* TObject.Destroy */ __fastcall virtual ~TIForm(void) { }
  225.     
  226. };
  227.  
  228. class DELPHICLASS TDragTarget;
  229. class PASCALIMPLEMENTATION TDragTarget : public System::TObject 
  230. {
  231.     typedef System::TObject inherited;
  232.     
  233. private:
  234.     Dsgnintf::TFormDesigner* FDesigner;
  235.     
  236. public:
  237.     __fastcall virtual TDragTarget(Dsgnintf::TFormDesigner* ADesigner);
  238.     virtual bool __fastcall DragOver(System::TObject* Target, System::TObject* Source, int X, int Y, Controls::TDragState 
  239.         State) = 0;
  240.     virtual void __fastcall DragDrop(System::TObject* Target, System::TObject* Source, int X, int Y) = 0
  241.         ;
  242.     __property Dsgnintf::TFormDesigner* Designer = {read=FDesigner};
  243. public:
  244.     /* TObject.Destroy */ __fastcall virtual ~TDragTarget(void) { }
  245.     
  246. };
  247.  
  248. typedef System::TMetaClass*TDragTargetClass;
  249.  
  250. class DELPHICLASS TILibrary;
  251. class PASCALIMPLEMENTATION TILibrary : public Virtintf::TInterface 
  252. {
  253.     typedef Virtintf::TInterface inherited;
  254.     
  255. public:
  256.     virtual void __fastcall CopySelectionToStream(Classes::TMemoryStream* S) = 0;
  257.     virtual TIForm* __fastcall CreateForm(TIModule* AModule, const System::AnsiString AFileName, bool Existing
  258.         , const System::AnsiString AFormName, const System::AnsiString AAncestor, const System::AnsiString 
  259.         AFileSystem) = 0;
  260.     virtual TIForm* __fastcall CreateFromStream(TIModule* AModule, const System::AnsiString AFileName, 
  261.         const System::AnsiString AFileSystem, Virtintf::TIStream* IStream) = 0;
  262.     virtual TIForm* __fastcall CreateNewForm(TIModule* AModule, const System::AnsiString AFileName, _di_IUnknown 
  263.         Creator) = 0;
  264.     virtual void __fastcall DesignerOptionsChanged(void) = 0;
  265.     virtual bool __fastcall EditAction(TEditAction Action) = 0;
  266.     virtual TIFile* __fastcall FindFile(const System::AnsiString FileName) = 0;
  267.     virtual TIForm* __fastcall FindForm(const System::AnsiString FormName) = 0;
  268.     virtual TIForm* __fastcall GetActiveForm(void) = 0;
  269.     virtual void __fastcall GetClassUnits(const System::AnsiString ClassName, Classes::TGetStrProc Proc
  270.         ) = 0;
  271.     virtual TICompClass* __fastcall GetCompClass(int Index) = 0;
  272.     virtual int __fastcall GetCompClassCount(void) = 0;
  273.     virtual void __fastcall GetCompHierarchy(Classes::TGetStrProc Proc) = 0;
  274.     virtual HBITMAP __fastcall GetComponentBitmap(void) = 0;
  275.     virtual TEditState __fastcall GetEditState(void) = 0;
  276.     virtual System::AnsiString __fastcall GetFirstSelectionType(void) = 0;
  277.     virtual void __fastcall GetFormNames(Classes::TGetStrProc Proc) = 0;
  278.     virtual int __fastcall GetModuleCount(void) = 0;
  279.     virtual System::AnsiString __fastcall GetModuleName(int Index) = 0;
  280.     virtual bool __fastcall GetOleCtrlHelp(const System::AnsiString Member, int &HelpCtx, System::AnsiString 
  281.         &HelpFile) = 0;
  282.     virtual void __fastcall GetProperties(TPropKind PropKind, TGetPropProc Proc) = 0;
  283.     virtual System::AnsiString __fastcall GetSelectionName(void) = 0;
  284.     virtual System::AnsiString __fastcall GetSelectionType(void) = 0;
  285.     virtual void __fastcall HideWindows(void) = 0;
  286.     virtual void __fastcall IsDesignMsg(tagMSG &Msg, bool &Handled) = 0;
  287.     virtual bool __fastcall IsTopmostForm(HWND Wnd) = 0;
  288.     virtual bool __fastcall IsValidTemplateSelection(void) = 0;
  289.     virtual void __fastcall ModalEditDone(void * ReturnWindow) = 0;
  290.     virtual void __fastcall PasteSelectionFromStream(Classes::TMemoryStream* S, Classes::TComponent* Parent
  291.         , const Windows::TRect &Rect) = 0;
  292.     virtual void __fastcall RaiseException(const System::AnsiString Message) = 0;
  293.     virtual void __fastcall RegisterDesignWindow(Forms::TForm* Window) = 0;
  294.     virtual void __fastcall RegisterDragTarget(const System::AnsiString SourceName, System::TMetaClass* 
  295.         TargetClass) = 0;
  296.     virtual void __fastcall ShowWindows(void) = 0;
  297.     virtual void __fastcall SetLockState(bool State) = 0;
  298.     virtual void __fastcall SetProjectName(const System::AnsiString Name) = 0;
  299.     virtual void __fastcall GetSelection(Dsgnintf::TComponentList* ASelection) = 0;
  300.     virtual void __fastcall SetSelection(Forms::TDesigner* Designer, Forms::TForm* DesignWindow, Dsgnintf::TComponentList* 
  301.         ASelection) = 0;
  302.     virtual void __fastcall UnregisterDesignWindow(Forms::TForm* Window) = 0;
  303.     virtual void __fastcall UnregisterExpertGroup(int Group) = 0;
  304. public:
  305.     /* TInterface.Create */ __fastcall TILibrary(void) : Virtintf::TInterface() { }
  306.     
  307. public:
  308.     /* TObject.Destroy */ __fastcall virtual ~TILibrary(void) { }
  309.     
  310. };
  311.  
  312. class PASCALIMPLEMENTATION TIModule : public Virtintf::TInterface 
  313. {
  314.     typedef Virtintf::TInterface inherited;
  315.     
  316. public:
  317.     virtual void __fastcall Activate(bool IsForm) = 0;
  318.     virtual void __fastcall CreateMethod(const System::AnsiString Name, Typinfo::PTypeData TypeData) = 0
  319.         ;
  320.     virtual void __fastcall FormModified(void) = 0;
  321.     virtual System::AnsiString __fastcall GetAncestorClassName(const System::AnsiString ClassName) = 0;
  322.         
  323.     virtual void __fastcall GetMethods(Typinfo::PTypeData TypeData, Classes::TGetStrProc Proc) = 0;
  324.     virtual bool __fastcall FormIsTopmost(void) = 0;
  325.     virtual void __fastcall FormResurrected(void) = 0;
  326.     virtual bool __fastcall MethodExists(const System::AnsiString Name) = 0;
  327.     virtual void __fastcall RenameComponent(TICompInfo* CompInfo, const System::AnsiString CurName, const 
  328.         System::AnsiString NewName) = 0;
  329.     virtual void __fastcall RenameForm(TICompInfo* CompInfo, const System::AnsiString NewName) = 0;
  330.     virtual void __fastcall RenameMethod(const System::AnsiString CurName, const System::AnsiString NewName
  331.         ) = 0;
  332.     virtual void __fastcall ShowMethod(const System::AnsiString Name) = 0;
  333.     virtual void __fastcall GetImportedForms(Classes::TGetStrProc Proc) = 0;
  334.     virtual void __fastcall ImportForm(const System::AnsiString FormName) = 0;
  335.     virtual void __fastcall Notify(Editintf::TNotifyCode NotifyCode) = 0;
  336.     virtual void __fastcall SwapSourceFormView(void) = 0;
  337.     virtual System::AnsiString __fastcall GetMethod(const System::AnsiString MethodName) = 0;
  338.     virtual void __fastcall AddMethods(System::AnsiString Methods, Classes::TStrings* Replacements, Classes::TStrings* 
  339.         MethodNames) = 0;
  340.     virtual bool __fastcall HasInterface(void) = 0;
  341.     virtual bool __fastcall InterfaceMemberExists(const System::AnsiString Name) = 0;
  342.     virtual void __fastcall AddToInterface(int InvKind, const System::AnsiString Name, Word VT, const System::AnsiString 
  343.         TypeInfo) = 0;
  344.     virtual void __fastcall GetProjectModules(Classes::TGetModuleProc Proc) = 0;
  345. public:
  346.     /* TInterface.Create */ __fastcall TIModule(void) : Virtintf::TInterface() { }
  347.     
  348. public:
  349.     /* TObject.Destroy */ __fastcall virtual ~TIModule(void) { }
  350.     
  351. };
  352.  
  353. class PASCALIMPLEMENTATION TIProperty : public Virtintf::TInterface 
  354. {
  355.     typedef Virtintf::TInterface inherited;
  356.     
  357. public:
  358.     virtual void __fastcall Activate(void) = 0;
  359.     virtual bool __fastcall AllEqual(void) = 0;
  360.     virtual void __fastcall Edit(void) = 0;
  361.     virtual Dsgnintf::TPropertyAttributes __fastcall GetAttributes(void) = 0;
  362.     virtual System::AnsiString __fastcall GetCompClassName(void) = 0;
  363.     virtual int __fastcall GetEditLimit(void) = 0;
  364.     virtual bool __fastcall GetEditValue(System::AnsiString &Value) = 0;
  365.     virtual System::AnsiString __fastcall GetName(void) = 0;
  366.     virtual void __fastcall GetProperties(TGetPropProc Proc) = 0;
  367.     virtual Typinfo::PTypeInfo __fastcall GetPropType(void) = 0;
  368.     virtual System::AnsiString __fastcall GetValue(void) = 0;
  369.     virtual void __fastcall GetValues(Classes::TGetStrProc Proc) = 0;
  370.     virtual void __fastcall Revert(void) = 0;
  371.     virtual void __fastcall SetValue(const System::AnsiString Value) = 0;
  372.     virtual System::TMetaClass* __fastcall GetCompClass(void) = 0;
  373. public:
  374.     /* TInterface.Create */ __fastcall TIProperty(void) : Virtintf::TInterface() { }
  375.     
  376. public:
  377.     /* TObject.Destroy */ __fastcall virtual ~TIProperty(void) { }
  378.     
  379. };
  380.  
  381. class PASCALIMPLEMENTATION TICompInfo : public Virtintf::TInterface 
  382. {
  383.     typedef Virtintf::TInterface inherited;
  384.     
  385. public:
  386.     virtual void __fastcall ClearEvent(int Index) = 0;
  387.     virtual System::AnsiString __fastcall GetClassName(void) = 0;
  388.     virtual int __fastcall GetEventCount(void) = 0;
  389.     virtual Typinfo::PPropInfo __fastcall GetEventInfo(int Index) = 0;
  390.     virtual System::AnsiString __fastcall GetEventValue(int Index) = 0;
  391.     virtual void * __fastcall GetComponentHandle(void) = 0;
  392.     virtual System::AnsiString __fastcall GetNamePath(void) = 0;
  393.     virtual int __fastcall GetSubInfoCount(void) = 0;
  394.     virtual TICompInfo* __fastcall GetSubInfo(int Index) = 0;
  395. public:
  396.     /* TInterface.Create */ __fastcall TICompInfo(void) : Virtintf::TInterface() { }
  397.     
  398. public:
  399.     /* TObject.Destroy */ __fastcall virtual ~TICompInfo(void) { }
  400.     
  401. };
  402.  
  403. typedef TILibrary* __fastcall (*TInitLibraryFunc)(TIDelphiIDE* App);
  404.  
  405. //-- var, const, procedure ---------------------------------------------------
  406. #define LibrarySignature "COMPLIB0056"
  407. extern PACKAGE TIDelphiIDE* DelphiIDE;
  408. extern PACKAGE TILibrary* CompLib;
  409. extern PACKAGE Word CF_COMPONENTS;
  410. extern PACKAGE bool __fastcall PossibleStream(const System::AnsiString S);
  411. extern PACKAGE void __fastcall CopyStreamToClipboard(Classes::TMemoryStream* S);
  412. extern PACKAGE Classes::TMemoryStream* __fastcall GetClipboardStream(void);
  413.  
  414. }    /* namespace Libintf */
  415. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  416. using namespace Libintf;
  417. #endif
  418. //-- end unit ----------------------------------------------------------------
  419. #endif    // LibIntf
  420.